program main_tes
	implicit none
	DOUBLE PRECISION contoh
	external contoh, ATURAN_TITIKTENGAH
	DOUBLE PRECISION a, b, I
	integer*2 n
	a = 0
	b = 1
	n = 8
	call ATURAN_TITIKTENGAH(contoh, a, b, n, I)
	print*,"Solusi ",I
end
